\(\int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx\) [163]

   Optimal result
   Rubi [N/A]
   Mathematica [N/A]
   Maple [N/A] (verified)
   Fricas [N/A]
   Sympy [N/A]
   Maxima [N/A]
   Giac [N/A]
   Mupad [N/A]

Optimal result

Integrand size = 22, antiderivative size = 22 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\frac {2^{-3-m} e^{2 i \left (a-\frac {b c}{d}\right )} (c+d x)^m \left (-\frac {i b (c+d x)}{d}\right )^{-m} \Gamma \left (1+m,-\frac {2 i b (c+d x)}{d}\right )}{b}+\frac {2^{-3-m} e^{-2 i \left (a-\frac {b c}{d}\right )} (c+d x)^m \left (\frac {i b (c+d x)}{d}\right )^{-m} \Gamma \left (1+m,\frac {2 i b (c+d x)}{d}\right )}{b}+\text {Int}\left ((c+d x)^m \cot (a+b x),x\right ) \]

[Out]

2^(-3-m)*exp(2*I*(a-b*c/d))*(d*x+c)^m*GAMMA(1+m,-2*I*b*(d*x+c)/d)/b/((-I*b*(d*x+c)/d)^m)+2^(-3-m)*(d*x+c)^m*GA
MMA(1+m,2*I*b*(d*x+c)/d)/b/exp(2*I*(a-b*c/d))/((I*b*(d*x+c)/d)^m)+Unintegrable((d*x+c)^m*cot(b*x+a),x)

Rubi [N/A]

Not integrable

Time = 0.21 (sec) , antiderivative size = 22, normalized size of antiderivative = 1.00, number of steps used = 0, number of rules used = 0, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.000, Rules used = {} \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx \]

[In]

Int[(c + d*x)^m*Cos[a + b*x]^2*Cot[a + b*x],x]

[Out]

(2^(-3 - m)*E^((2*I)*(a - (b*c)/d))*(c + d*x)^m*Gamma[1 + m, ((-2*I)*b*(c + d*x))/d])/(b*(((-I)*b*(c + d*x))/d
)^m) + (2^(-3 - m)*(c + d*x)^m*Gamma[1 + m, ((2*I)*b*(c + d*x))/d])/(b*E^((2*I)*(a - (b*c)/d))*((I*b*(c + d*x)
)/d)^m) + Defer[Int][(c + d*x)^m*Cot[a + b*x], x]

Rubi steps \begin{align*} \text {integral}& = \int (c+d x)^m \cot (a+b x) \, dx-\int (c+d x)^m \cos (a+b x) \sin (a+b x) \, dx \\ & = \int (c+d x)^m \cot (a+b x) \, dx-\int \frac {1}{2} (c+d x)^m \sin (2 a+2 b x) \, dx \\ & = -\left (\frac {1}{2} \int (c+d x)^m \sin (2 a+2 b x) \, dx\right )+\int (c+d x)^m \cot (a+b x) \, dx \\ & = -\left (\frac {1}{4} i \int e^{-i (2 a+2 b x)} (c+d x)^m \, dx\right )+\frac {1}{4} i \int e^{i (2 a+2 b x)} (c+d x)^m \, dx+\int (c+d x)^m \cot (a+b x) \, dx \\ & = \frac {2^{-3-m} e^{2 i \left (a-\frac {b c}{d}\right )} (c+d x)^m \left (-\frac {i b (c+d x)}{d}\right )^{-m} \Gamma \left (1+m,-\frac {2 i b (c+d x)}{d}\right )}{b}+\frac {2^{-3-m} e^{-2 i \left (a-\frac {b c}{d}\right )} (c+d x)^m \left (\frac {i b (c+d x)}{d}\right )^{-m} \Gamma \left (1+m,\frac {2 i b (c+d x)}{d}\right )}{b}+\int (c+d x)^m \cot (a+b x) \, dx \\ \end{align*}

Mathematica [N/A]

Not integrable

Time = 12.32 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx \]

[In]

Integrate[(c + d*x)^m*Cos[a + b*x]^2*Cot[a + b*x],x]

[Out]

Integrate[(c + d*x)^m*Cos[a + b*x]^2*Cot[a + b*x], x]

Maple [N/A] (verified)

Not integrable

Time = 0.34 (sec) , antiderivative size = 22, normalized size of antiderivative = 1.00

\[\int \left (d x +c \right )^{m} \cos \left (x b +a \right )^{2} \cot \left (x b +a \right )d x\]

[In]

int((d*x+c)^m*cos(b*x+a)^2*cot(b*x+a),x)

[Out]

int((d*x+c)^m*cos(b*x+a)^2*cot(b*x+a),x)

Fricas [N/A]

Not integrable

Time = 0.25 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int { {\left (d x + c\right )}^{m} \cos \left (b x + a\right )^{2} \cot \left (b x + a\right ) \,d x } \]

[In]

integrate((d*x+c)^m*cos(b*x+a)^2*cot(b*x+a),x, algorithm="fricas")

[Out]

integral((d*x + c)^m*cos(b*x + a)^2*cot(b*x + a), x)

Sympy [N/A]

Not integrable

Time = 24.32 (sec) , antiderivative size = 22, normalized size of antiderivative = 1.00 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int \left (c + d x\right )^{m} \cos ^{2}{\left (a + b x \right )} \cot {\left (a + b x \right )}\, dx \]

[In]

integrate((d*x+c)**m*cos(b*x+a)**2*cot(b*x+a),x)

[Out]

Integral((c + d*x)**m*cos(a + b*x)**2*cot(a + b*x), x)

Maxima [N/A]

Not integrable

Time = 0.77 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int { {\left (d x + c\right )}^{m} \cos \left (b x + a\right )^{2} \cot \left (b x + a\right ) \,d x } \]

[In]

integrate((d*x+c)^m*cos(b*x+a)^2*cot(b*x+a),x, algorithm="maxima")

[Out]

integrate((d*x + c)^m*cos(b*x + a)^2*cot(b*x + a), x)

Giac [N/A]

Not integrable

Time = 0.32 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int { {\left (d x + c\right )}^{m} \cos \left (b x + a\right )^{2} \cot \left (b x + a\right ) \,d x } \]

[In]

integrate((d*x+c)^m*cos(b*x+a)^2*cot(b*x+a),x, algorithm="giac")

[Out]

integrate((d*x + c)^m*cos(b*x + a)^2*cot(b*x + a), x)

Mupad [N/A]

Not integrable

Time = 25.15 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.09 \[ \int (c+d x)^m \cos ^2(a+b x) \cot (a+b x) \, dx=\int {\cos \left (a+b\,x\right )}^2\,\mathrm {cot}\left (a+b\,x\right )\,{\left (c+d\,x\right )}^m \,d x \]

[In]

int(cos(a + b*x)^2*cot(a + b*x)*(c + d*x)^m,x)

[Out]

int(cos(a + b*x)^2*cot(a + b*x)*(c + d*x)^m, x)